Informática Multimedia 1995 April/Informatica Multimedia CD - Epimundo.iso/DOS/FILE_CHG/AWK.ZIP/WORLD.AWK

AWK Script | 1988-02-25 | 117 b | 6 lines

BEGIN { FS = "\t" }
      { pop[$4] += $3 }
END   { for (name in pop)
            print name, pop[name]
      }